perm filename VLISP.IIN[VLI,LSP] blob sn#382114 filedate 1978-09-12 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(de ack (x y) (cond
C00003 ENDMK
CāŠ—;
(de ack (x y) (cond
  ((= x 0) (1+ y))
  ((= y 0) (self (1- x) 1))
  (t (self (1- x) (self x (1- y))))))